home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power Programmierung
/
Power-Programmierung (Tewi)(1994).iso
/
magazine
/
comp_lan
/
85_febr
/
fortrn.7
< prev
next >
Wrap
Text File
|
1988-07-25
|
512b
|
21 lines
Listing 7
C Instead of FORTRAN?
double f(x) /* black box form for data */
double x; /* point to evaluate at */
{
double y;
extern double xarray[],yarray[]; /* our data defined
as external */
extern int npoints; /* points in arrays */
y = linterp(xarray,yarray,x,npoints);
/* compute answer */
return(y); /* return answer (no error check) */
}